/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_09 / sound / arc_wave

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 20 | 41 72 63 5f 57 61 76 65 |..... > |Arc_Wave|
|00000010| 0d 00 14 27 f4 20 50 72 | 6f 67 72 61 6d 20 20 20 |...'. Pr|ogram   |
|00000020| 57 61 76 65 74 61 62 6c | 65 20 56 6f 69 63 65 20 |Wavetabl|e Voice |
|00000030| 42 75 69 6c 64 65 72 0d | 00 1e 1c f4 20 41 75 74 |Builder.|.... Aut|
|00000040| 68 6f 72 20 20 20 20 49 | 61 6e 20 4e 69 63 68 6f |hor    I|an Nicho|
|00000050| 6c 6c 73 0d 00 28 14 f4 | 20 56 65 72 73 69 6f 6e |lls..(..| Version|
|00000060| 20 20 20 31 2e 30 30 0d | 00 32 19 f4 20 41 52 43 |   1.00.|.2.. ARC|
|00000070| 48 49 56 45 20 20 20 4a | 75 6e 65 20 31 39 38 38 |HIVE   J|une 1988|
|00000080| 0d 00 3c 24 f4 20 50 72 | 6f 67 72 61 6d 20 20 20 |..<$. Pr|ogram   |
|00000090| 53 75 62 6a 65 63 74 20 | 74 6f 20 43 6f 70 79 72 |Subject |to Copyr|
|000000a0| 69 67 68 74 0d 00 46 05 | 3a 0d 00 50 10 ee 20 85 |ight..F.|:..P.. .|
|000000b0| 20 f2 65 72 72 6f 72 3a | e0 0d 00 5a 08 eb 30 3a | .error:|...Z..0:|
|000000c0| 87 0d 00 64 11 ef 32 38 | 2c 32 31 2c 34 2c 35 37 |...d..28|,21,4,57|
|000000d0| 2c 30 0d 00 6e 0e fb 31 | 32 39 3a db 3a ef 32 36 |,0..n..1|29:.:.26|
|000000e0| 0d 00 78 2f fb 30 3a f1 | 8a 32 34 2c 32 29 22 41 |..x/.0:.|.24,2)"A|
|000000f0| 52 43 48 49 56 45 20 57 | 41 56 45 54 41 42 4c 45 |RCHIVE W|AVETABLE|
|00000100| 20 56 4f 49 43 45 20 42 | 55 49 4c 44 45 52 22 0d | VOICE B|UILDER".|
|00000110| 00 82 17 fb 31 3a fb 31 | 32 38 3a f2 64 65 6c 61 |....1:.1|28:.dela|
|00000120| 79 28 32 30 30 29 0d 00 | 8c 68 f1 8a 34 2c 38 29 |y(200)..|.h..4,8)|
|00000130| 22 54 68 65 20 77 61 76 | 65 74 61 62 6c 65 20 64 |"The wav|etable d|
|00000140| 61 74 61 20 66 69 6c 65 | 73 20 63 75 72 72 65 6e |ata file|s curren|
|00000150| 74 6c 79 20 68 65 6c 64 | 20 69 6e 20 64 69 72 65 |tly held| in dire|
|00000160| 63 74 6f 72 79 20 22 22 | 57 54 44 61 74 61 46 69 |ctory ""|WTDataFi|
|00000170| 6c 65 22 22 20 61 72 65 | 3a 2d 22 27 27 27 3a 2a |le"" are|:-"''':*|
|00000180| 44 49 52 20 57 54 44 61 | 74 61 46 69 6c 65 0d 00 |DIR WTDa|taFile..|
|00000190| 96 14 f2 64 65 6c 61 79 | 28 32 30 30 29 3a 2a 43 |...delay|(200):*C|
|000001a0| 41 54 0d 00 a0 19 76 65 | 72 74 25 3d bc 2b 33 3a |AT....ve|rt%=.+3:|
|000001b0| f2 64 65 6c 61 79 28 32 | 30 30 29 0d 00 aa 68 ee |.delay(2|00)...h.|
|000001c0| 3a e8 8a 32 30 2c 76 65 | 72 74 25 29 22 50 6c 65 |:..20,ve|rt%)"Ple|
|000001d0| 61 73 65 20 74 79 70 65 | 20 69 6e 20 74 68 65 20 |ase type| in the |
|000001e0| 6e 61 6d 65 20 6f 66 20 | 74 68 65 20 77 61 76 65 |name of |the wave|
|000001f0| 74 61 62 6c 65 22 8a 32 | 30 2c 76 65 72 74 25 2b |table".2|0,vert%+|
|00000200| 31 29 22 64 61 74 61 20 | 66 69 6c 65 20 74 6f 20 |1)"data |file to |
|00000210| 62 65 20 75 73 65 64 20 | 2e 2e 2e 2e 20 22 6e 61 |be used |.... "na|
|00000220| 6d 65 24 0d 00 b4 23 87 | 3a 63 68 61 6e 6e 65 6c |me$...#.|:channel|
|00000230| 25 3d 8e 28 6e 61 6d 65 | 24 29 3a f2 64 65 6c 61 |%=.(name|$):.dela|
|00000240| 79 28 31 35 30 29 0d 00 | be 05 3a 0d 00 c8 0f f2 |y(150)..|..:.....|
|00000250| 69 6e 69 74 69 61 6c 69 | 73 65 0d 00 d2 0e c8 8e |initiali|se......|
|00000260| 20 74 79 70 65 25 20 ca | 0d 00 dc 08 c9 20 31 3a | type% .|..... 1:|
|00000270| 0d 00 e6 15 e8 23 63 68 | 61 6e 6e 65 6c 25 2c 6e |.....#ch|annel%,n|
|00000280| 5f 68 61 72 25 0d 00 f0 | 14 f2 72 65 61 64 5f 61 |_har%...|..read_a|
|00000290| 6d 70 5f 62 72 6b 70 74 | 73 0d 00 fa 11 f2 62 75 |mp_brkpt|s.....bu|
|000002a0| 66 66 65 72 5f 73 65 74 | 75 70 0d 01 04 16 f1 8a |ffer_set|up......|
|000002b0| 30 2c 33 29 22 46 49 52 | 53 54 20 50 41 53 53 22 |0,3)"FIR|ST PASS"|
|000002c0| 0d 01 0e 08 74 25 3d 30 | 0d 01 18 16 c8 95 20 74 |....t%=0|...... t|
|000002d0| 25 20 3c 20 4d 61 78 45 | 6e 64 54 69 6d 65 0d 01 |% < MaxE|ndTime..|
|000002e0| 22 11 f2 61 6d 70 5f 73 | 65 67 6d 65 6e 74 31 0d |"..amp_s|egment1.|
|000002f0| 01 2c 11 f2 61 6d 70 5f | 73 65 67 6d 65 6e 74 32 |.,..amp_|segment2|
|00000300| 0d 01 36 09 74 25 2b 3d | 31 0d 01 40 05 ce 0d 01 |..6.t%+=|1..@....|
|00000310| 4a 08 74 25 3d 30 0d 01 | 54 17 f1 8a 30 2c 37 29 |J.t%=0..|T...0,7)|
|00000320| 22 53 45 43 4f 4e 44 20 | 50 41 53 53 22 0d 01 5e |"SECOND |PASS"..^|
|00000330| 16 c8 95 20 74 25 20 3c | 20 4d 61 78 45 6e 64 54 |... t% <| MaxEndT|
|00000340| 69 6d 65 0d 01 68 13 f2 | 65 6e 64 5f 6f 66 5f 73 |ime..h..|end_of_s|
|00000350| 65 67 6d 65 6e 74 0d 01 | 72 37 57 61 76 65 54 61 |egment..|r7WaveTa|
|00000360| 62 6c 65 25 3f 74 25 3d | a4 44 41 43 6c 6f 67 28 |ble%?t%=|.DAClog(|
|00000370| 54 61 62 6c 65 45 6e 74 | 72 79 28 74 25 29 2f 4d |TableEnt|ry(t%)/M|
|00000380| 61 78 54 61 62 6c 65 45 | 6e 74 72 79 29 0d 01 7c |axTableE|ntry)..||
|00000390| 09 74 25 2b 3d 31 0d 01 | 86 05 ce 0d 01 90 0a c9 |.t%+=1..|........|
|000003a0| 20 32 2c 33 3a 0d 01 9a | 0c 6e 5f 68 61 72 25 3d | 2,3:...|.n_har%=|
|000003b0| 31 0d 01 a4 14 f2 72 65 | 61 64 5f 61 6d 70 5f 62 |1.....re|ad_amp_b|
|000003c0| 72 6b 70 74 73 0d 01 ae | 14 f2 72 65 61 64 5f 6d |rkpts...|..read_m|
|000003d0| 6f 64 5f 62 72 6b 70 74 | 73 0d 01 b8 11 f2 62 75 |od_brkpt|s.....bu|
|000003e0| 66 66 65 72 5f 73 65 74 | 75 70 0d 01 c2 08 74 25 |ffer_set|up....t%|
|000003f0| 3d 30 0d 01 cc 16 c8 95 | 20 74 25 20 3c 20 4d 61 |=0......| t% < Ma|
|00000400| 78 45 6e 64 54 69 6d 65 | 0d 01 d6 11 f2 61 6d 70 |xEndTime|.....amp|
|00000410| 5f 73 65 67 6d 65 6e 74 | 31 0d 01 e0 10 f2 6d 6f |_segment|1.....mo|
|00000420| 64 5f 73 65 67 6d 65 6e | 74 0d 01 ea 13 f2 65 6e |d_segmen|t.....en|
|00000430| 64 5f 6f 66 5f 73 65 67 | 6d 65 6e 74 0d 01 f4 16 |d_of_seg|ment....|
|00000440| 70 3d 28 28 74 25 83 32 | 35 36 29 2b 30 2e 35 29 |p=((t%.2|56)+0.5)|
|00000450| 2a 7a 0d 01 fe 0f e7 20 | 74 79 70 65 25 3d 32 20 |*z..... |type%=2 |
|00000460| 8c 0d 02 08 20 78 3d 61 | 28 30 29 2a b5 28 46 43 |.... x=a|(0)*.(FC|
|00000470| 2a 70 2b 69 28 30 29 2a | b5 28 46 4d 31 2a 70 29 |*p+i(0)*|.(FM1*p)|
|00000480| 29 0d 02 12 05 cc 0d 02 | 1c 2e 78 3d 61 28 30 29 |).......|..x=a(0)|
|00000490| 2a b5 28 46 43 2a 70 2b | 69 28 30 29 2a b5 28 46 |*.(FC*p+|i(0)*.(F|
|000004a0| 4d 31 2a 70 29 2b 69 28 | 31 29 2a b5 28 46 4d 32 |M1*p)+i(|1)*.(FM2|
|000004b0| 2a 70 29 29 0d 02 26 05 | cd 0d 02 30 11 6c 25 3d |*p))..&.|...0.l%=|
|000004c0| a4 44 41 43 6c 6f 67 28 | 78 29 0d 02 3a 14 57 61 |.DAClog(|x)..:.Wa|
|000004d0| 76 65 54 61 62 6c 65 25 | 3f 74 25 3d 6c 25 0d 02 |veTable%|?t%=l%..|
|000004e0| 44 09 74 25 2b 3d 31 0d | 02 4e 05 ce 0d 02 58 05 |D.t%+=1.|.N....X.|
|000004f0| cb 0d 02 62 16 e8 23 63 | 68 61 6e 6e 65 6c 25 2c |...b..#c|hannel%,|
|00000500| 65 6e 64 73 65 67 25 0d | 02 6c 4f f1 27 27 22 54 |endseg%.|.lO.''"T|
|00000510| 68 65 20 52 45 4c 45 41 | 53 45 20 70 68 61 73 65 |he RELEA|SE phase|
|00000520| 20 6f 66 20 74 68 65 20 | 61 6d 70 6c 69 74 75 64 | of the |amplitud|
|00000530| 65 20 65 6e 76 65 6c 6f | 70 65 20 73 74 61 72 74 |e envelo|pe start|
|00000540| 73 20 61 74 20 73 65 67 | 6d 65 6e 74 20 22 3b 65 |s at seg|ment ";e|
|00000550| 6e 64 73 65 67 25 0d 02 | 76 1e d9 23 63 68 61 6e |ndseg%..|v..#chan|
|00000560| 6e 65 6c 25 3a f2 64 65 | 6c 61 79 28 32 30 30 29 |nel%:.de|lay(200)|
|00000570| 3a 2a 55 50 0d 02 80 19 | 24 62 75 66 66 65 72 25 |:*UP....|$buffer%|
|00000580| 3d 22 57 61 76 65 54 61 | 62 6c 65 73 22 0d 02 8a |="WaveTa|bles"...|
|00000590| 26 c8 99 22 4f 53 5f 46 | 69 6c 65 22 2c 35 2c 62 |&.."OS_F|ile",5,b|
|000005a0| 75 66 66 65 72 25 20 b8 | 20 66 69 6c 65 5f 74 79 |uffer% .| file_ty|
|000005b0| 70 65 25 0d 02 94 14 e7 | 20 66 69 6c 65 5f 74 79 |pe%.....| file_ty|
|000005c0| 70 65 25 3d 30 20 8c 0d | 02 9e 14 2a 43 44 49 52 |pe%=0 ..|...*CDIR|
|000005d0| 20 57 61 76 65 54 61 62 | 6c 65 73 0d 02 a8 4e f1 | WaveTab|les...N.|
|000005e0| 27 22 44 69 72 65 63 74 | 6f 72 79 20 22 22 57 61 |'"Direct|ory ""Wa|
|000005f0| 76 65 54 61 62 6c 65 73 | 22 22 20 68 61 73 20 62 |veTables|"" has b|
|00000600| 65 65 6e 20 63 72 65 61 | 74 65 64 20 74 6f 20 68 |een crea|ted to h|
|00000610| 6f 6c 64 20 79 6f 75 72 | 20 77 61 76 65 74 61 62 |old your| wavetab|
|00000620| 6c 65 20 66 69 6c 65 73 | 22 0d 02 b2 05 cd 0d 02 |le files|".......|
|00000630| bc 27 57 61 76 65 44 65 | 73 63 72 69 70 74 6f 72 |.'WaveDe|scriptor|
|00000640| 25 21 30 3d 30 20 3a f4 | 20 65 6e 64 20 77 61 76 |%!0=0 :.| end wav|
|00000650| 65 66 6f 72 6d 0d 02 c6 | 17 57 61 76 65 44 65 73 |eform...|.WaveDes|
|00000660| 63 72 69 70 74 6f 72 25 | 21 34 3d 30 0d 02 d0 0b |criptor%|!4=0....|
|00000670| f2 68 65 61 64 65 72 0d | 02 da 09 f2 73 61 76 65 |.header.|....save|
|00000680| 0d 02 e4 2a db 3a f1 27 | 27 27 8a 31 37 29 22 50 |...*.:.'|''.17)"P|
|00000690| 6c 65 61 73 65 20 65 6e | 74 65 72 20 79 6f 75 72 |lease en|ter your|
|000006a0| 20 63 68 6f 69 63 65 3a | 2d 22 0d 02 ee 3a f1 27 | choice:|-"...:.'|
|000006b0| 27 27 8a 31 37 29 22 31 | 20 2d 20 62 75 69 6c 64 |''.17)"1| - build|
|000006c0| 20 61 20 77 61 76 65 74 | 61 62 6c 65 20 66 72 6f | a wavet|able fro|
|000006d0| 6d 20 61 6e 6f 74 68 65 | 72 20 64 61 74 61 20 66 |m anothe|r data f|
|000006e0| 69 6c 65 22 0d 02 f8 33 | f1 27 8a 31 37 29 22 32 |ile"...3|.'.17)"2|
|000006f0| 20 2d 20 63 72 65 61 74 | 65 20 66 75 72 74 68 65 | - creat|e furthe|
|00000700| 72 20 77 61 76 65 74 61 | 62 6c 65 20 64 61 74 61 |r waveta|ble data|
|00000710| 20 66 69 6c 65 73 22 0d | 03 02 14 f1 27 8a 31 37 | files".|....'.17|
|00000720| 29 22 33 20 2d 20 65 78 | 69 74 22 0d 03 0c 22 f5 |)"3 - ex|it"...".|
|00000730| 3a 69 6e 70 75 74 24 3d | be 3a fd 20 a7 22 31 32 |:input$=|.:. ."12|
|00000740| 33 22 2c 69 6e 70 75 74 | 24 29 3c 3e 30 0d 03 16 |3",input|$)<>0...|
|00000750| 0f c8 8e 20 69 6e 70 75 | 74 24 20 ca 0d 03 20 0b |... inpu|t$ ... .|
|00000760| c9 20 22 31 22 3a f9 0d | 03 2a 14 c9 20 22 32 22 |. "1":..|.*.. "2"|
|00000770| 3a d7 22 46 69 6c 65 47 | 65 6e 22 0d 03 34 0f c9 |:."FileG|en"..4..|
|00000780| 20 22 33 22 3a ef 32 36 | 3a e0 0d 03 3e 05 cb 0d | "3":.26|:...>...|
|00000790| 03 48 05 3a 0d 03 52 10 | dd f2 69 6e 69 74 69 61 |.H.:..R.|..initia|
|000007a0| 6c 69 73 65 0d 03 5c 0f | 4e 42 6b 50 74 73 25 20 |lise..\.|NBkPts% |
|000007b0| 3d 33 30 0d 03 66 12 4e | 48 61 72 6d 6f 6e 69 63 |=30..f.N|Harmonic|
|000007c0| 73 25 3d 32 30 0d 03 70 | 13 4d 61 78 54 61 62 6c |s%=20..p|.MaxTabl|
|000007d0| 65 45 6e 74 72 79 3d 30 | 0d 03 7a 05 3a 0d 03 84 |eEntry=0|..z.:...|
|000007e0| 46 de 20 41 6d 70 45 6e | 64 28 4e 42 6b 50 74 73 |F. AmpEn|d(NBkPts|
|000007f0| 25 2d 31 2c 4e 48 61 72 | 6d 6f 6e 69 63 73 25 2d |%-1,NHar|monics%-|
|00000800| 31 29 2c 41 6d 70 54 69 | 6d 65 28 4e 42 6b 50 74 |1),AmpTi|me(NBkPt|
|00000810| 73 25 2d 31 2c 4e 48 61 | 72 6d 6f 6e 69 63 73 25 |s%-1,NHa|rmonics%|
|00000820| 2d 31 29 0d 03 8e 32 de | 20 61 6d 70 42 50 25 28 |-1)...2.| ampBP%(|
|00000830| 4e 48 61 72 6d 6f 6e 69 | 63 73 25 2d 31 29 2c 45 |NHarmoni|cs%-1),E|
|00000840| 6e 64 54 69 6d 65 28 4e | 48 61 72 6d 6f 6e 69 63 |ndTime(N|Harmonic|
|00000850| 73 25 2d 31 29 0d 03 98 | 46 de 20 4d 6f 64 45 6e |s%-1)...|F. ModEn|
|00000860| 64 28 4e 42 6b 50 74 73 | 25 2d 31 2c 31 29 2c 4d |d(NBkPts|%-1,1),M|
|00000870| 6f 64 54 69 6d 65 28 4e | 42 6b 50 74 73 25 2d 31 |odTime(N|BkPts%-1|
|00000880| 2c 31 29 2c 6d 6f 64 42 | 50 25 28 31 29 2c 4d 6f |,1),modB|P%(1),Mo|
|00000890| 64 45 6e 64 54 69 6d 65 | 28 31 29 0d 03 a2 5f de |dEndTime|(1)..._.|
|000008a0| 20 61 28 4e 48 61 72 6d | 6f 6e 69 63 73 25 2d 31 | a(NHarm|onics%-1|
|000008b0| 29 2c 41 28 4e 48 61 72 | 6d 6f 6e 69 63 73 25 2d |),A(NHar|monics%-|
|000008c0| 31 29 2c 41 54 28 4e 48 | 61 72 6d 6f 6e 69 63 73 |1),AT(NH|armonics|
|000008d0| 25 2d 31 29 2c 64 41 28 | 4e 48 61 72 6d 6f 6e 69 |%-1),dA(|NHarmoni|
|000008e0| 63 73 25 2d 31 29 2c 68 | 61 72 6d 28 4e 48 61 72 |cs%-1),h|arm(NHar|
|000008f0| 6d 6f 6e 69 63 73 25 2d | 31 29 0d 03 ac 26 de 20 |monics%-|1)...&. |
|00000900| 69 28 31 29 2c 49 28 31 | 29 2c 49 54 28 31 29 2c |i(1),I(1|),IT(1),|
|00000910| 64 49 28 31 29 2c 62 75 | 66 66 65 72 25 20 31 32 |dI(1),bu|ffer% 12|
|00000920| 0d 03 b6 0b 7a 3d af 2f | 31 32 38 0d 03 c0 1a e8 |....z=./|128.....|
|00000930| 23 63 68 61 6e 6e 65 6c | 25 2c 6e 61 6d 65 24 2c |#channel|%,name$,|
|00000940| 74 79 70 65 25 0d 03 ca | 13 ef 32 38 2c 30 2c 33 |type%...|..28,0,3|
|00000950| 31 2c 37 39 2c 38 3a db | 0d 03 d4 05 e1 0d 03 de |1,79,8:.|........|
|00000960| 05 3a 0d 03 e8 15 dd f2 | 72 65 61 64 5f 61 6d 70 |.:......|read_amp|
|00000970| 5f 62 72 6b 70 74 73 0d | 03 f2 15 e3 20 49 25 3d |_brkpts.|.... I%=|
|00000980| 30 20 b8 20 6e 5f 68 61 | 72 25 2d 31 0d 03 fc 09 |0 . n_ha|r%-1....|
|00000990| 62 70 25 3d 30 0d 04 06 | 21 e7 20 74 79 70 65 25 |bp%=0...|!. type%|
|000009a0| 3d 31 20 e8 23 63 68 61 | 6e 6e 65 6c 25 2c 68 61 |=1 .#cha|nnel%,ha|
|000009b0| 72 6d 28 49 25 29 0d 04 | 10 12 e8 23 63 68 61 6e |rm(I%)..|...#chan|
|000009c0| 6e 65 6c 25 2c 74 2c 76 | 0d 04 1a 1c 41 6d 70 54 |nel%,t,v|....AmpT|
|000009d0| 69 6d 65 28 62 70 25 2c | 49 25 29 3d a4 54 69 6d |ime(bp%,|I%)=.Tim|
|000009e0| 65 28 74 29 0d 04 24 14 | 41 6d 70 45 6e 64 28 62 |e(t)..$.|AmpEnd(b|
|000009f0| 70 25 2c 49 25 29 3d 76 | 0d 04 2e 05 f5 0d 04 38 |p%,I%)=v|.......8|
|00000a00| 12 e8 23 63 68 61 6e 6e | 65 6c 25 2c 74 2c 76 0d |..#chann|el%,t,v.|
|00000a10| 04 42 10 74 20 3d 20 a4 | 54 69 6d 65 28 74 29 0d |.B.t = .|Time(t).|
|00000a20| 04 4c 19 e7 20 74 3e 41 | 6d 70 54 69 6d 65 28 62 |.L.. t>A|mpTime(b|
|00000a30| 70 25 2c 49 25 29 20 8c | 0d 04 56 0a 62 70 25 2b |p%,I%) .|..V.bp%+|
|00000a40| 3d 31 0d 04 60 15 41 6d | 70 54 69 6d 65 28 62 70 |=1..`.Am|pTime(bp|
|00000a50| 25 2c 49 25 29 3d 74 0d | 04 6a 14 41 6d 70 45 6e |%,I%)=t.|.j.AmpEn|
|00000a60| 64 28 62 70 25 2c 49 25 | 29 3d 76 0d 04 74 05 cd |d(bp%,I%|)=v..t..|
|00000a70| 0d 04 7e 19 fd 20 74 20 | 3c 20 41 6d 70 54 69 6d |..~.. t |< AmpTim|
|00000a80| 65 28 62 70 25 2c 49 25 | 29 0d 04 88 21 45 6e 64 |e(bp%,I%|)...!End|
|00000a90| 54 69 6d 65 28 49 25 29 | 20 3d 20 41 6d 70 54 69 |Time(I%)| = AmpTi|
|00000aa0| 6d 65 28 62 70 25 2c 49 | 25 29 0d 04 92 05 ed 0d |me(bp%,I|%)......|
|00000ab0| 04 9c 10 4d 61 78 45 6e | 64 54 69 6d 65 3d 30 0d |...MaxEn|dTime=0.|
|00000ac0| 04 a6 15 e3 20 49 25 3d | 30 20 b8 20 6e 5f 68 61 |.... I%=|0 . n_ha|
|00000ad0| 72 25 2d 31 0d 04 b0 35 | e7 20 45 6e 64 54 69 6d |r%-1...5|. EndTim|
|00000ae0| 65 28 49 25 29 20 3e 20 | 4d 61 78 45 6e 64 54 69 |e(I%) > |MaxEndTi|
|00000af0| 6d 65 20 4d 61 78 45 6e | 64 54 69 6d 65 3d 45 6e |me MaxEn|dTime=En|
|00000b00| 64 54 69 6d 65 28 49 25 | 29 0d 04 ba 05 ed 0d 04 |dTime(I%|).......|
|00000b10| c4 1c de 20 54 61 62 6c | 65 45 6e 74 72 79 28 4d |... Tabl|eEntry(M|
|00000b20| 61 78 45 6e 64 54 69 6d | 65 29 0d 04 ce 05 e1 0d |axEndTim|e)......|
|00000b30| 04 d8 05 3a 0d 04 e2 15 | dd f2 72 65 61 64 5f 6d |...:....|..read_m|
|00000b40| 6f 64 5f 62 72 6b 70 74 | 73 0d 04 ec 23 e7 20 74 |od_brkpt|s...#. t|
|00000b50| 79 70 65 25 3d 32 20 8c | 20 6e 5f 6d 6f 64 25 3d |ype%=2 .| n_mod%=|
|00000b60| 30 20 8b 20 6e 5f 6d 6f | 64 25 3d 31 0d 04 f6 13 |0 . n_mo|d%=1....|
|00000b70| e3 20 49 25 3d 30 20 b8 | 20 6e 5f 6d 6f 64 25 0d |. I%=0 .| n_mod%.|
|00000b80| 05 00 09 62 70 25 3d 30 | 0d 05 0a 12 e8 23 63 68 |...bp%=0|.....#ch|
|00000b90| 61 6e 6e 65 6c 25 2c 74 | 2c 76 0d 05 14 1c 4d 6f |annel%,t|,v....Mo|
|00000ba0| 64 54 69 6d 65 28 62 70 | 25 2c 49 25 29 3d a4 54 |dTime(bp|%,I%)=.T|
|00000bb0| 69 6d 65 28 74 29 0d 05 | 1e 14 4d 6f 64 45 6e 64 |ime(t)..|..ModEnd|
|00000bc0| 28 62 70 25 2c 49 25 29 | 3d 76 0d 05 28 05 f5 0d |(bp%,I%)|=v..(...|
|00000bd0| 05 32 12 e8 23 63 68 61 | 6e 6e 65 6c 25 2c 74 2c |.2..#cha|nnel%,t,|
|00000be0| 76 0d 05 3c 10 74 20 3d | 20 a4 54 69 6d 65 28 74 |v..<.t =| .Time(t|
|00000bf0| 29 0d 05 46 19 e7 20 74 | 3e 4d 6f 64 54 69 6d 65 |)..F.. t|>ModTime|
|00000c00| 28 62 70 25 2c 49 25 29 | 20 8c 0d 05 50 0a 62 70 |(bp%,I%)| ...P.bp|
|00000c10| 25 2b 3d 31 0d 05 5a 15 | 4d 6f 64 54 69 6d 65 28 |%+=1..Z.|ModTime(|
|00000c20| 62 70 25 2c 49 25 29 3d | 74 0d 05 64 14 4d 6f 64 |bp%,I%)=|t..d.Mod|
|00000c30| 45 6e 64 28 62 70 25 2c | 49 25 29 3d 76 0d 05 6e |End(bp%,|I%)=v..n|
|00000c40| 05 cd 0d 05 78 19 fd 20 | 74 20 3c 20 4d 6f 64 54 |....x.. |t < ModT|
|00000c50| 69 6d 65 28 62 70 25 2c | 49 25 29 0d 05 82 22 4d |ime(bp%,|I%)..."M|
|00000c60| 6f 64 45 6e 64 54 69 6d | 65 28 49 25 29 3d 4d 6f |odEndTim|e(I%)=Mo|
|00000c70| 64 54 69 6d 65 28 62 70 | 25 2c 49 25 29 0d 05 8c |dTime(bp|%,I%)...|
|00000c80| 05 ed 0d 05 96 15 e8 23 | 63 68 61 6e 6e 65 6c 25 |.......#|channel%|
|00000c90| 2c 46 43 2c 46 4d 31 0d | 05 a0 1e e7 20 74 79 70 |,FC,FM1.|.... typ|
|00000ca0| 65 25 3d 33 20 8c 20 e8 | 23 63 68 61 6e 6e 65 6c |e%=3 . .|#channel|
|00000cb0| 25 2c 46 4d 32 0d 05 aa | 05 e1 0d 05 b4 05 3a 0d |%,FM2...|......:.|
|00000cc0| 05 be 12 dd f2 62 75 66 | 66 65 72 5f 73 65 74 75 |.....buf|fer_setu|
|00000cd0| 70 0d 05 c8 1c 6e 57 61 | 76 65 73 25 3d 4d 61 78 |p....nWa|ves%=Max|
|00000ce0| 45 6e 64 54 69 6d 65 20 | 81 20 32 35 36 0d 05 d2 |EndTime |. 256...|
|00000cf0| 5c f1 22 59 6f 75 72 20 | 77 61 76 65 74 61 62 6c |\."Your |wavetabl|
|00000d00| 65 20 64 61 74 61 20 66 | 69 6c 65 20 77 69 6c 6c |e data f|ile will|
|00000d10| 20 63 72 65 61 74 65 20 | 61 20 77 61 76 65 74 61 | create |a waveta|
|00000d20| 62 6c 65 22 27 22 63 6f | 6e 73 69 73 74 69 6e 67 |ble"'"co|nsisting|
|00000d30| 20 6f 66 20 22 3b 6e 57 | 61 76 65 73 25 3b 22 20 | of ";nW|aves%;" |
|00000d40| 73 65 67 6d 65 6e 74 73 | 22 0d 05 dc 15 57 61 76 |segments|"....Wav|
|00000d50| 65 53 69 7a 65 25 3d 6e | 57 61 76 65 73 25 0d 05 |eSize%=n|Waves%..|
|00000d60| e6 2e 57 61 76 65 48 65 | 61 64 65 72 25 3d 28 28 |..WaveHe|ader%=((|
|00000d70| 36 34 20 2b 20 28 6e 57 | 61 76 65 73 25 2b 31 29 |64 + (nW|aves%+1)|
|00000d80| 2a 38 29 2b 32 35 35 29 | 81 32 35 36 0d 05 f0 29 |*8)+255)|.256...)|
|00000d90| 42 75 66 66 53 69 7a 65 | 25 3d 28 57 61 76 65 48 |BuffSize|%=(WaveH|
|00000da0| 65 61 64 65 72 25 2b 57 | 61 76 65 53 69 7a 65 25 |eader%+W|aveSize%|
|00000db0| 29 2a 32 35 36 0d 05 fa | 17 de 20 42 75 66 66 25 |)*256...|.. Buff%|
|00000dc0| 20 42 75 66 66 53 69 7a | 65 25 2d 31 0d 06 04 28 | BuffSiz|e%-1...(|
|00000dd0| 57 61 76 65 54 61 62 6c | 65 25 20 3d 20 42 75 66 |WaveTabl|e% = Buf|
|00000de0| 66 25 20 2b 20 57 61 76 | 65 48 65 61 64 65 72 25 |f% + Wav|eHeader%|
|00000df0| 2a 32 35 36 0d 06 0e 1e | 57 61 76 65 44 65 73 63 |*256....|WaveDesc|
|00000e00| 72 69 70 74 6f 72 25 20 | 3d 20 42 75 66 66 25 2b |riptor% |= Buff%+|
|00000e10| 36 34 0d 06 18 11 64 65 | 73 63 72 69 70 74 6f 72 |64....de|scriptor|
|00000e20| 25 3d 38 0d 06 22 05 e1 | 0d 06 2c 05 3a 0d 06 36 |%=8.."..|..,.:..6|
|00000e30| 12 dd f2 61 6d 70 5f 73 | 65 67 6d 65 6e 74 31 0d |...amp_s|egment1.|
|00000e40| 06 40 15 e3 20 49 25 3d | 30 20 b8 20 6e 5f 68 61 |.@.. I%=|0 . n_ha|
|00000e50| 72 25 2d 31 0d 06 4a 18 | e7 20 74 25 20 3e 20 45 |r%-1..J.|. t% > E|
|00000e60| 6e 64 54 69 6d 65 28 49 | 25 29 20 8c 0d 06 54 0b |ndTime(I|%) ...T.|
|00000e70| 61 28 49 25 29 3d 30 0d | 06 5e 05 cc 0d 06 68 22 |a(I%)=0.|.^....h"|
|00000e80| e7 20 74 25 3e 3d 41 6d | 70 54 69 6d 65 28 61 6d |. t%>=Am|pTime(am|
|00000e90| 70 42 50 25 28 49 25 29 | 2c 49 25 29 20 8c 0d 06 |pBP%(I%)|,I%) ...|
|00000ea0| 72 1f 41 28 49 25 29 3d | 41 6d 70 45 6e 64 28 61 |r.A(I%)=|AmpEnd(a|
|00000eb0| 6d 70 42 50 25 28 49 25 | 29 2c 49 25 29 0d 06 7c |mpBP%(I%|),I%)..||
|00000ec0| 21 41 54 28 49 25 29 3d | 41 6d 70 54 69 6d 65 28 |!AT(I%)=|AmpTime(|
|00000ed0| 61 6d 70 42 50 25 28 49 | 25 29 2c 49 25 29 0d 06 |ampBP%(I|%),I%)..|
|00000ee0| 86 11 61 6d 70 42 50 25 | 28 49 25 29 2b 3d 31 0d |..ampBP%|(I%)+=1.|
|00000ef0| 06 90 48 64 41 28 49 25 | 29 3d 28 41 6d 70 45 6e |..HdA(I%|)=(AmpEn|
|00000f00| 64 28 61 6d 70 42 50 25 | 28 49 25 29 2c 49 25 29 |d(ampBP%|(I%),I%)|
|00000f10| 2d 41 28 49 25 29 29 2f | 28 41 6d 70 54 69 6d 65 |-A(I%))/|(AmpTime|
|00000f20| 28 61 6d 70 42 50 25 28 | 49 25 29 2c 49 25 29 2d |(ampBP%(|I%),I%)-|
|00000f30| 41 54 28 49 25 29 29 0d | 06 9a 05 cd 0d 06 a4 22 |AT(I%)).|......."|
|00000f40| 61 28 49 25 29 3d 41 28 | 49 25 29 2b 64 41 28 49 |a(I%)=A(|I%)+dA(I|
|00000f50| 25 29 2a 28 74 25 2d 41 | 54 28 49 25 29 29 0d 06 |%)*(t%-A|T(I%))..|
|00000f60| ae 05 cd 0d 06 b8 05 ed | 0d 06 c2 05 e1 0d 06 cc |........|........|
|00000f70| 05 3a 0d 06 d6 12 dd f2 | 61 6d 70 5f 73 65 67 6d |.:......|amp_segm|
|00000f80| 65 6e 74 32 0d 06 e0 16 | 70 3d 28 28 74 25 83 32 |ent2....|p=((t%.2|
|00000f90| 35 36 29 2b 30 2e 35 29 | 2a 7a 0d 06 ea 07 78 3d |56)+0.5)|*z....x=|
|00000fa0| 30 0d 06 f4 15 e3 20 49 | 25 3d 30 20 b8 20 6e 5f |0..... I|%=0 . n_|
|00000fb0| 68 61 72 25 2d 31 0d 06 | fe 1a 78 2b 3d 61 28 49 |har%-1..|..x+=a(I|
|00000fc0| 25 29 2a b5 28 70 2a 68 | 61 72 6d 28 49 25 29 29 |%)*.(p*h|arm(I%))|
|00000fd0| 0d 07 08 05 ed 0d 07 12 | 14 54 61 62 6c 65 45 6e |........|.TableEn|
|00000fe0| 74 72 79 28 74 25 29 3d | 78 0d 07 1c 25 e7 20 78 |try(t%)=|x...%. x|
|00000ff0| 3e 4d 61 78 54 61 62 6c | 65 45 6e 74 72 79 20 4d |>MaxTabl|eEntry M|
|00001000| 61 78 54 61 62 6c 65 45 | 6e 74 72 79 3d 78 0d 07 |axTableE|ntry=x..|
|00001010| 26 2a e7 20 28 74 25 83 | 32 35 36 29 3d 30 20 f1 |&*. (t%.|256)=0 .|
|00001020| 8a 30 2c 34 29 3b 22 53 | 65 67 6d 65 6e 74 3a 20 |.0,4);"S|egment: |
|00001030| 22 3b 74 25 81 32 35 36 | 0d 07 30 05 e1 0d 07 3a |";t%.256|..0....:|
|00001040| 05 3a 0d 07 44 11 dd f2 | 6d 6f 64 5f 73 65 67 6d |.:..D...|mod_segm|
|00001050| 65 6e 74 0d 07 4e 13 e3 | 20 49 25 3d 30 20 b8 20 |ent..N..| I%=0 . |
|00001060| 6e 5f 6d 6f 64 25 0d 07 | 58 1b e7 20 74 25 20 3e |n_mod%..|X.. t% >|
|00001070| 20 4d 6f 64 45 6e 64 54 | 69 6d 65 28 49 25 29 20 | ModEndT|ime(I%) |
|00001080| 8c 0d 07 62 0b 69 28 49 | 25 29 3d 30 0d 07 6c 05 |...b.i(I|%)=0..l.|
|00001090| cc 0d 07 76 22 e7 20 74 | 25 3e 3d 4d 6f 64 54 69 |...v". t|%>=ModTi|
|000010a0| 6d 65 28 6d 6f 64 42 50 | 25 28 49 25 29 2c 49 25 |me(modBP|%(I%),I%|
|000010b0| 29 20 8c 0d 07 80 1f 49 | 28 49 25 29 3d 4d 6f 64 |) .....I|(I%)=Mod|
|000010c0| 45 6e 64 28 6d 6f 64 42 | 50 25 28 49 25 29 2c 49 |End(modB|P%(I%),I|
|000010d0| 25 29 0d 07 8a 21 49 54 | 28 49 25 29 3d 4d 6f 64 |%)...!IT|(I%)=Mod|
|000010e0| 54 69 6d 65 28 6d 6f 64 | 42 50 25 28 49 25 29 2c |Time(mod|BP%(I%),|
|000010f0| 49 25 29 0d 07 94 11 6d | 6f 64 42 50 25 28 49 25 |I%)....m|odBP%(I%|
|00001100| 29 2b 3d 31 0d 07 9e 48 | 64 49 28 49 25 29 3d 28 |)+=1...H|dI(I%)=(|
|00001110| 4d 6f 64 45 6e 64 28 6d | 6f 64 42 50 25 28 49 25 |ModEnd(m|odBP%(I%|
|00001120| 29 2c 49 25 29 2d 49 28 | 49 25 29 29 2f 28 4d 6f |),I%)-I(|I%))/(Mo|
|00001130| 64 54 69 6d 65 28 6d 6f | 64 42 50 25 28 49 25 29 |dTime(mo|dBP%(I%)|
|00001140| 2c 49 25 29 2d 49 54 28 | 49 25 29 29 0d 07 a8 05 |,I%)-IT(|I%))....|
|00001150| cd 0d 07 b2 22 69 28 49 | 25 29 3d 49 28 49 25 29 |...."i(I|%)=I(I%)|
|00001160| 2b 64 49 28 49 25 29 2a | 28 74 25 2d 49 54 28 49 |+dI(I%)*|(t%-IT(I|
|00001170| 25 29 29 0d 07 bc 05 cd | 0d 07 c6 05 ed 0d 07 d0 |%)).....|........|
|00001180| 05 e1 0d 07 da 05 3a 0d | 07 e4 14 dd f2 65 6e 64 |......:.|.....end|
|00001190| 5f 6f 66 5f 73 65 67 6d | 65 6e 74 0d 07 ee 12 e7 |_of_segm|ent.....|
|000011a0| 20 28 74 25 83 32 35 36 | 29 3d 30 20 8c 0d 07 f8 | (t%.256|)=0 ....|
|000011b0| 2f f1 8a 30 2c 38 29 3b | 22 53 65 67 6d 65 6e 74 |/..0,8);|"Segment|
|000011c0| 3a 20 22 3b 74 25 81 32 | 35 36 3b 22 20 20 20 20 |: ";t%.2|56;"    |
|000011d0| 20 20 20 20 20 20 20 20 | 20 20 20 22 0d 08 02 33 |        |   "...3|
|000011e0| 57 61 76 65 44 65 73 63 | 72 69 70 74 6f 72 25 21 |WaveDesc|riptor%!|
|000011f0| 30 3d 26 46 46 20 2b 20 | 28 35 31 3c 3c 39 29 20 |0=&FF + |(51<<9) |
|00001200| 3a f4 20 6f 6e 65 20 77 | 61 76 65 66 6f 72 6d 0d |:. one w|aveform.|
|00001210| 08 0c 40 57 61 76 65 44 | 65 73 63 72 69 70 74 6f |..@WaveD|escripto|
|00001220| 72 25 21 34 3d 28 28 64 | 65 73 63 72 69 70 74 6f |r%!4=((d|escripto|
|00001230| 72 25 2b 31 29 3c 3c 31 | 36 29 2b 57 61 76 65 48 |r%+1)<<1|6)+WaveH|
|00001240| 65 61 64 65 72 25 2b 28 | 74 25 81 32 35 36 29 0d |eader%+(|t%.256).|
|00001250| 08 16 16 57 61 76 65 44 | 65 73 63 72 69 70 74 6f |...WaveD|escripto|
|00001260| 72 25 2b 3d 38 0d 08 20 | 12 64 65 73 63 72 69 70 |r%+=8.. |.descrip|
|00001270| 74 6f 72 25 2b 3d 31 0d | 08 2a 05 cd 0d 08 34 05 |tor%+=1.|.*....4.|
|00001280| e1 0d 08 3e 05 3a 0d 08 | 48 0c dd f2 68 65 61 64 |...>.:..|H...head|
|00001290| 65 72 0d 08 52 05 f5 0d | 08 5c 43 db 3a ee 3a e8 |er..R...|.\C.:.:.|
|000012a0| 27 22 57 68 61 74 20 6e | 61 6d 65 20 64 6f 20 79 |'"What n|ame do y|
|000012b0| 6f 75 20 77 69 73 68 20 | 74 6f 20 67 69 76 65 20 |ou wish |to give |
|000012c0| 74 6f 20 74 68 69 73 20 | 77 61 76 65 74 61 62 6c |to this |wavetabl|
|000012d0| 65 20 3f 20 22 6e 61 6d | 65 24 0d 08 66 1c fd 20 |e ? "nam|e$..f.. |
|000012e0| a9 6e 61 6d 65 24 3e 30 | 20 80 20 a9 6e 61 6d 65 |.name$>0| . .name|
|000012f0| 24 3c 31 32 3a 87 0d 08 | 70 13 e3 20 41 25 3d 30 |$<12:...|p.. A%=0|
|00001300| 20 b8 20 36 33 20 88 20 | 34 0d 08 7a 0e 42 75 66 | . 63 . |4..z.Buf|
|00001310| 66 25 21 41 25 3d 30 0d | 08 84 05 ed 0d 08 8e 17 |f%!A%=0.|........|
|00001320| 74 69 74 6c 65 24 3d 22 | 21 57 54 3a 22 2b 6e 61 |title$="|!WT:"+na|
|00001330| 6d 65 24 0d 08 98 11 24 | 42 75 66 66 25 3d 74 69 |me$....$|Buff%=ti|
|00001340| 74 6c 65 24 0d 08 a2 15 | 42 75 66 66 25 3f 28 a9 |tle$....|Buff%?(.|
|00001350| 74 69 74 6c 65 24 29 3d | 30 0d 08 ac 16 42 75 66 |title$)=|0....Buf|
|00001360| 66 25 21 31 36 3d 42 75 | 66 66 53 69 7a 65 25 0d |f%!16=Bu|ffSize%.|
|00001370| 08 b6 0e 42 75 66 66 25 | 21 32 30 3d 38 0d 08 c0 |...Buff%|!20=8...|
|00001380| 0e 42 75 66 66 25 21 32 | 34 3d 38 0d 08 ca 0e 42 |.Buff%!2|4=8....B|
|00001390| 75 66 66 25 21 32 38 3d | 38 0d 08 d4 0e 42 75 66 |uff%!28=|8....Buf|
|000013a0| 66 25 21 33 32 3d 38 0d | 08 de 0e 42 75 66 66 25 |f%!32=8.|...Buff%|
|000013b0| 21 33 36 3d 38 0d 08 e8 | 0e 42 75 66 66 25 21 34 |!36=8...|.Buff%!4|
|000013c0| 30 3d 38 0d 08 f2 0e 42 | 75 66 66 25 21 34 34 3d |0=8....B|uff%!44=|
|000013d0| 38 0d 08 fc 0e 42 75 66 | 66 25 21 34 38 3d 38 0d |8....Buf|f%!48=8.|
|000013e0| 09 06 16 42 75 66 66 25 | 21 35 32 3d 38 2b 65 6e |...Buff%|!52=8+en|
|000013f0| 64 73 65 67 25 0d 09 10 | 05 e1 0d 09 1a 05 3a 0d |dseg%...|......:.|
|00001400| 09 24 0a dd f2 73 61 76 | 65 0d 09 2e 4a ff 28 22 |.$...sav|e...J.("|
|00001410| 53 41 56 45 20 57 61 76 | 65 54 61 62 6c 65 73 2e |SAVE Wav|eTables.|
|00001420| 22 2b 6e 61 6d 65 24 2b | 22 20 22 2b c3 7e 42 75 |"+name$+|" "+.~Bu|
|00001430| 66 66 25 2b 22 20 2b 22 | 2b c3 7e 42 75 66 66 53 |ff%+" +"|+.~BuffS|
|00001440| 69 7a 65 25 2b 22 20 30 | 20 46 46 46 46 46 44 30 |ize%+" 0| FFFFFD0|
|00001450| 30 22 29 0d 09 38 20 ff | 28 22 53 54 41 4d 50 20 |0")..8 .|("STAMP |
|00001460| 57 61 76 65 54 61 62 6c | 65 73 2e 22 2b 6e 61 6d |WaveTabl|es."+nam|
|00001470| 65 24 29 0d 09 42 05 e1 | 0d 09 4c 05 3a 0d 09 56 |e$)..B..|..L.:..V|
|00001480| 40 dd 20 a4 54 69 6d 65 | 28 74 29 20 3d 20 74 2a |@. .Time|(t) = t*|
|00001490| 32 35 36 20 3a f4 20 63 | 6f 6e 76 65 72 74 20 63 |256 :. c|onvert c|
|000014a0| 65 6e 74 69 73 65 63 6f | 6e 64 73 20 74 6f 20 73 |entiseco|nds to s|
|000014b0| 61 6d 70 6c 65 20 70 65 | 72 69 6f 64 73 0d 09 60 |ample pe|riods..`|
|000014c0| 05 3a 0d 09 6a 0f dd a4 | 44 41 43 6c 6f 67 28 4e |.:..j...|DAClog(N|
|000014d0| 29 0d 09 74 21 f4 20 6c | 6f 67 20 6f 66 20 4e 20 |)..t!. l|og of N |
|000014e0| 69 6e 20 74 68 65 20 72 | 61 6e 67 65 20 2b 2f 2d |in the r|ange +/-|
|000014f0| 20 31 0d 09 7e 2f ea 20 | 53 25 2c 4e 25 20 3a 20 | 1..~/. |S%,N% : |
|00001500| e7 20 4e 20 3c 20 30 20 | 8c 20 53 25 3d 26 30 31 |. N < 0 |. S%=&01|
|00001510| 3a 20 4e 3d 94 28 4e 29 | 20 8b 20 53 25 3d 26 30 |: N=.(N)| . S%=&0|
|00001520| 30 0d 09 88 10 e7 20 4e | 3d 30 20 8c 20 3d 20 53 |0..... N|=0 . = S|
|00001530| 25 0d 09 92 18 4e 25 3d | 30 2e 35 2b a8 28 4e 2a |%....N%=|0.5+.(N*|
|00001540| 34 30 39 36 20 2b 31 36 | 29 0d 09 9c 1c e7 20 4e |4096 +16|)..... N|
|00001550| 25 20 3e 20 26 46 46 46 | 20 8c 20 3d 20 53 25 20 |% > &FFF| . = S% |
|00001560| 84 20 26 46 45 0d 09 a6 | 0d c8 95 20 4e 25 3e 3d |. &FE...|... N%>=|
|00001570| 33 32 0d 09 b0 18 4e 25 | 3d 4e 25 3e 3e 31 20 3a |32....N%|=N%>>1 :|
|00001580| 20 53 25 3d 53 25 2b 26 | 32 30 0d 09 ba 05 ce 0d | S%=S%+&|20......|
|00001590| 09 c4 15 3d 53 25 20 84 | 20 28 28 4e 25 80 26 46 |...=S% .| ((N%.&F|
|000015a0| 29 2a 32 29 0d 09 ce 05 | 3a 0d 09 d8 12 dd f2 64 |)*2)....|:......d|
|000015b0| 65 6c 61 79 28 74 69 6d | 65 25 29 0d 09 e2 13 d1 |elay(tim|e%).....|
|000015c0| 3d 30 3a f5 20 fd 20 91 | 3e 74 69 6d 65 25 0d 09 |=0:. . .|>time%..|
|000015d0| ec 05 e1 0d 09 f6 05 3a | 0d 0a 00 0b dd f2 65 72 |.......:|......er|
|000015e0| 72 6f 72 0d 0a 0a 17 db | 3a f6 3a f1 3b 22 20 61 |ror.....|:.:.;" a|
|000015f0| 74 20 6c 69 6e 65 20 22 | 3b 9e 0d 0a 14 0b d9 23 |t line "|;......#|
|00001600| 30 3a 2a 55 50 0d 0a 1e | 05 e1 0d ff             |0:*UP...|....    |
+--------+-------------------------+-------------------------+--------+--------+